#!/usr/bin/Rscript

mydata = read.table("eaa-lab-7.out", skip=1)
plotData = mydata[,'V11']
plotData = 100 - plotData
plotData
plot(plotData, type="b", xlab="Time in Seconds", ylab="CPU Usage Level", col="blue", pch=21)